home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Night Owl 6
/
Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso
/
036a
/
katcal.zip
/
K0000001.PGM
< prev
next >
Wrap
Text File
|
1990-05-11
|
352b
|
20 lines
* - Compressed char for long prints
* this is a slightly oblong comment
:Begin
CLRS
WD What is your age?
RD r1
:Proccess
MOV r2, 44.32
MUL r1, r2
:Report
WD Your age modified by *44.32 is:
WD r1
:Again
WD Run this program again?
WD 1=YES, 0=NO
RD r1
MOV r2, 1
clrs
JE r1,r2, Begin
halt